'AAVBSORT.TXT ' Declarations for AAVBSORT.DLL 'SortAry routines for Simple Types ' Sorts the array in place Declare Sub SortAryCurrency Lib "aavbsort.dll" (array_c() As Currency) Declare Sub SortAryDouble Lib "aavbsort.dll" (array_d() As Double) Declare Sub SortAryInteger Lib "aavbsort.dll" (array_i() As Integer) Declare Sub SortAryLong Lib "aavbsort.dll" (array_l() As Long) Declare Sub SortArySingle Lib "aavbsort.dll" (array_f() As Single) Declare Sub SortAryString Lib "aavbsort.dll" (array_s() As String) 'SortIdx routines for Simple Types ' Sorts a index into the array Declare Sub SortIdxCurrency Lib "aavbsort.dll" (array_c() As Currency, indexArray() As Integer) Declare Sub SortIdxDouble Lib "aavbsort.dll" (array_d() As Double, indexArray() As Integer) Declare Sub SortIdxInteger Lib "aavbsort.dll" (array_i() As Integer, indexArray() As Integer) Declare Sub SortIdxLong Lib "aavbsort.dll" (array_l() As Long, indexArray() As Integer) Declare Sub SortIdxSingle Lib "aavbsort.dll" (array_f() As Single, indexArray() As Integer) Declare Sub SortIdxString Lib "aavbsort.dll" (array_s() As String, indexArray() As Integer) 'SortAry and SortIdx routines for Fixed string ' You need to declare one of these for the specific size of ' fix string array you are using. These are just examples. Declare Sub SortAryFixed15String Lib "aavbsort.dll" Alias "SortAryFixedString" (s15() As String * 15) Declare Sub SortAryFixed40String Lib "aavbsort.dll" Alias "SortAryFixedString" (s40() As String * 40) Declare Sub SortAryFixed80String Lib "aavbsort.dll" Alias "SortAryFixedString" (s80() As String * 80) Declare Sub SortAryFixed255String Lib "aavbsort.dll" Alias "SortAryFixedString" (s255() As String * 255) Declare Sub SortIdxFixed15String Lib "aavbsort.dll" Alias "SortIdxFixedString" (s15() As String * 15, indexArray() As Integer) Declare Sub SortIdxFixed40String Lib "aavbsort.dll" Alias "SortIdxFixedString" (s40() As String * 40, indexArray() As Integer) Declare Sub SortIdxFixed80String Lib "aavbsort.dll" Alias "SortIdxFixedString" (s80() As String * 80, indexArray() As Integer) Declare Sub SortIdxFixed255String Lib "aavbsort.dll" Alias "SortIdxFixedString" (s255() As String * 255, indexArray() As Integer)